program p
result(1:7) = (/ 1.3, vector_x, 2.35, vector_y /)
end program p
